DrawText(String[],RectangleF,String) メソッド

指定した文字列の配列を指定した矩形範囲に描画し、指定した領域へのハイパーリンクを作成します。

シンタックス

Visual Basic
C#

'宣言
 
Public Overloads Sub DrawText( _
   ByVal astrText() As String, _
   ByVal text As RectangleF, _
   ByVal strLink As String _
)

public void DrawText( 
   string[] astrText,
   RectangleF text,
   string strLink
)

パラメータ

astrText: ページ上に描画するテキスト文字列の配列。
text: テキストの矩形範囲。
strLink: ハイパーリンクURL。

使用例

private void arv_Load(object sender, System.EventArgs e)
{
    rptDocument rpt = new rptDocument();
    rpt.Run();
    arv.Document=rpt.Document;

    System.Drawing.Font f = new System.Drawing.Font("Times New Roman", 36);
    string[] strArray = new string[5] {"A", "B", "C", "Sofware", "Company"}; 
    arv.Document.Pages[0].ForeColor = System.Drawing.Color.YellowGreen;
    arv.Document.Pages[0].Font = f;
    arv.Document.Pages[0].TextAlignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Center;
    arv.Document.Pages[0].TextAngle = 900;
    arv.Document.Pages[0].VerticalTextAlignment = GrapeCity.ActiveReports.Document.Section.VerticalTextAlignment.Middle;

    Single x = 1.0F;
    Single y = 1.0F;
    Single width = 6.5F;
    Single height = 9.0F;
    RectangleF drawRect = new RectangleF(x,y,width,height);

    arv.Document.Pages[0].DrawText(strArray, drawRect, "www.GrapeCity.com");
}

Visual Basic

Private Sub arv_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles arv.Load
    Dim rpt As New rptDocument
    rpt.Run()
    arv.Document = rpt.Document

    Dim f As New System.Drawing.Font("Times New Roman", 36)
    Dim strArray() As String = New String(4) {"A", "B", "C", "Software", "Company"}
    Dim x As Single = 1.0F
    Dim y As Single = 1.0F
    Dim width As Single = 6.0F
    Dim height As Single = 9.0F
    Dim drawRect As New RectangleF(x, y, width, height)

    With arv.Document.Pages(0)
        .Font = f
        .ForeColor = System.Drawing.Color.YellowGreen
        .TextAlignment = GrapeCity.ActiveReports.Document.Section.TextAlignment.Center
        .TextAngle = 900
        .VerticalTextAlignment = GrapeCity.ActiveReports.Document.Section.VerticalTextAlignment.Middle
        .DrawText(strArray, drawRect, "www.GrapeCity.com")
    End With
End Sub

参照

Page クラス
 Page メンバ
 オーバーロード一覧